MacFormat 1997 February

home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1997 February / macformat-047.iso / Shareware Plus / Developers / LogoMation 1.1.4 ƒ / Examples / Lib / Towers of Hanoi.lib < prev
MacBinary | 1995-09-02 | 3.6 KB | [UVtx/UVtl]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Towers of Hanoi.lib
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Sibelius Music / Score `(music/sibeliusMusicScore)`	ext	Unsupported
`1%`	dexvert	IntelliFont Font `(font/intelliFont)`	ext	Unsupported
`1%`	dexvert	Amiga Hunk Library/Object `(other/amigaLibrary)`	ext	Unsupported
`1%`	dexvert	Amiga Shared Library `(other/amigaSharedLibrary)`	ext	Unsupported
`1%`	dexvert	Chess Assistant File `(other/chessAssistant)`	ext	Unsupported
`1%`	dexvert	CODESYS Library `(other/codesysLibrary)`	ext	Unsupported
`1%`	dexvert	COFF Library `(other/coffLibrary)`	ext	Unsupported
`1%`	dexvert	P-CAD binary Library `(other/pCADBinaryLibrary)`	ext	Unsupported
`1%`	dexvert	Maple Library `(other/mapleLibrary)`	ext	Unsupported
`1%`	dexvert	TopSpeed Modula-2 Library `(other/topSpeedModula2Library)`	ext	Unsupported
`100%`	file	MacBinary II, Thu Oct 29 16:28:17 1992, modified Sat Sep 2 12:28:59 1995, creator 'UVtl', type 'UVtx', 3172 bytes "Towers of Hanoi.lib" , at 0xce4 371 bytes resource	default (weak)
`99%`	file	data	default
`100%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[UVtx]`
macFileCreator	`[UVtl]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 13 54 6f 77 65 72 73 | 20 6f 66 20 48 61 6e 6f |..Towers| of Hano|
|00000010| 69 2e 6c 69 62 00 00 00 | 00 00 00 00 00 00 00 00 |i.lib...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 55 56 74 78 55 56 74 | 6c 00 00 00 00 00 00 00 |.UVtxUVt|l.......|
|00000050| 00 00 00 00 00 0c 64 00 | 00 01 73 a7 16 07 f1 ac |......d.|..s.....|
|00000060| 6e 36 cb 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |n6......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 2f 41 00 00 |........|..../A..|
|00000080| 2f 2f 20 6c 69 62 72 61 | 72 79 20 66 75 6e 63 74 |// libra|ry funct|
|00000090| 69 6f 6e 73 20 66 6f 72 | 20 74 68 65 20 54 6f 77 |ions for| the Tow|
|000000a0| 65 72 73 20 6f 66 20 48 | 61 6e 6f 69 0d 0d 2f 2f |ers of H|anoi..//|
|000000b0| 20 47 65 74 4e 75 6d 62 | 65 72 4f 66 54 6f 77 65 | GetNumb|erOfTowe|
|000000c0| 72 73 20 2d 20 61 73 6b | 20 66 6f 72 20 74 68 65 |rs - ask| for the|
|000000d0| 20 6e 75 6d 62 65 72 2c | 20 61 6e 64 20 72 65 74 | number,| and ret|
|000000e0| 75 72 6e 20 69 74 0d 2f | 2f 2f 2f 2f 2f 2f 2f 2f |urn it./|////////|
|000000f0| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00000100| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00000110| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 0d |////////|///////.|
|00000120| 46 75 6e 63 74 69 6f 6e | 20 47 65 74 4e 75 6d 62 |Function| GetNumb|
|00000130| 65 72 4f 66 54 6f 77 65 | 72 73 28 6e 29 0d 20 20 |erOfTowe|rs(n).  |
|00000140| 20 20 50 65 6e 20 6e 61 | 6d 65 3d 22 47 4e 54 70 |  Pen na|me="GNTp|
|00000150| 65 6e 22 0d 20 20 20 20 | 43 6c 65 61 72 20 35 33 |en".    |Clear 53|
|00000160| 30 36 36 2c 36 34 39 30 | 39 2c 36 35 35 33 35 0d |066,6490|9,65535.|
|00000170| 20 20 20 20 43 6f 6c 6f | 72 20 35 36 39 31 32 2c |    Colo|r 56912,|
|00000180| 32 38 39 31 2c 32 31 32 | 31 30 0d 20 20 20 20 55 |2891,212|10.    U|
|00000190| 70 0d 20 20 20 20 47 6f | 74 6f 20 2d 31 30 30 2c |p.    Go|to -100,|
|000001a0| 30 2c 30 0d 20 20 20 20 | 50 72 69 6e 74 20 22 4e |0,0.    |Print "N|
|000001b0| 75 6d 62 65 72 20 6f 66 | 20 72 69 6e 67 73 20 28 |umber of| rings (|
|000001c0| 31 2e 2e 31 30 29 3a 20 | 22 2c 20 6d 6f 76 65 0d |1..10): |", move.|
|000001d0| 20 20 20 20 44 6f 77 6e | 0d 20 20 20 20 46 6f 72 |    Down|.    For|
|000001e0| 77 61 72 64 20 32 35 0d | 20 20 20 20 42 61 63 6b |ward 25.|    Back|
|000001f0| 77 61 72 64 20 32 35 0d | 20 20 20 20 6e 20 3d 20 |ward 25.|    n = |
|00000200| 61 73 6b 28 33 30 29 0d | 20 20 20 20 49 66 20 28 |ask(30).|    If (|
|00000210| 6e 20 3c 20 31 29 20 7c | 20 28 6e 20 3e 20 31 30 |n < 1) || (n > 10|
|00000220| 29 0d 20 20 20 20 20 20 | 20 20 55 70 0d 20 20 20 |).      |  Up.   |
|00000230| 20 20 20 20 20 47 6f 74 | 6f 20 2d 31 30 30 2c 2d |     Got|o -100,-|
|00000240| 33 30 2c 30 0d 20 20 20 | 20 20 20 20 20 50 72 69 |30,0.   |     Pri|
|00000250| 6e 74 20 22 53 6f 72 72 | 79 2c 20 6d 75 73 74 20 |nt "Sorr|y, must |
|00000260| 62 65 20 62 65 74 77 65 | 65 6e 20 31 20 61 6e 64 |be betwe|en 1 and|
|00000270| 20 31 30 21 22 0d 20 20 | 20 20 20 20 20 20 53 6f | 10!".  |      So|
|00000280| 75 6e 64 20 22 4f 6f 70 | 73 22 0d 20 20 20 20 20 |und "Oop|s".     |
|00000290| 20 20 20 48 61 6c 74 0d | 20 20 20 20 52 65 74 75 |   Halt.|    Retu|
|000002a0| 72 6e 20 6e 0d 20 20 20 | 20 0d 2f 2f 20 53 65 74 |rn n.   | .// Set|
|000002b0| 55 70 20 2d 20 62 75 69 | 6c 64 20 74 68 65 20 74 |Up - bui|ld the t|
|000002c0| 6f 77 65 72 73 2c 20 62 | 75 69 6c 64 20 74 68 65 |owers, b|uild the|
|000002d0| 20 72 69 6e 67 2c 20 69 | 6e 69 74 20 76 61 72 73 | ring, i|nit vars|
|000002e0| 0d 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |.///////|////////|
|000002f0| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00000300| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00000310| 2f 2f 2f 2f 2f 2f 2f 0d | 46 75 6e 63 74 69 6f 6e |///////.|Function|
|00000320| 20 53 65 74 55 70 28 29 | 0d 20 20 20 20 72 69 6e | SetUp()|.    rin|
|00000330| 67 48 65 69 67 68 74 20 | 3d 20 31 35 0d 20 20 20 |gHeight |= 15.   |
|00000340| 20 2f 2f 20 63 72 65 61 | 74 65 20 74 68 65 20 4e | // crea|te the N|
|00000350| 20 72 69 6e 67 73 0d 20 | 20 20 20 52 65 70 65 61 | rings. |   Repea|
|00000360| 74 20 69 2c 31 2c 4e 0d | 20 20 20 20 20 20 20 20 |t i,1,N.|        |
|00000370| 50 69 63 74 75 72 65 20 | 22 72 69 6e 67 22 20 2e |Picture |"ring" .|
|00000380| 20 69 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 55 | i.     |       U|
|00000390| 70 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 47 6f |p.      |      Go|
|000003a0| 74 6f 20 2d 69 2a 35 2c | 30 2c 30 0d 20 20 20 20 |to -i*5,|0,0.    |
|000003b0| 20 20 20 20 20 20 20 20 | 44 6f 77 6e 0d 20 20 20 |        |Down.   |
|000003c0| 20 20 20 20 20 20 20 20 | 20 46 69 6c 6c 20 31 2c |        | Fill 1,|
|000003d0| 72 61 6e 64 6f 6d 28 36 | 35 30 30 30 29 2c 72 61 |random(6|5000),ra|
|000003e0| 6e 64 6f 6d 28 36 35 30 | 30 30 29 2c 72 61 6e 64 |ndom(650|00),rand|
|000003f0| 6f 6d 28 36 35 30 30 30 | 29 0d 20 20 20 20 20 20 |om(65000|).      |
|00000400| 20 20 20 20 20 20 20 20 | 20 20 52 65 70 65 61 74 |        |  Repeat|
|00000410| 20 32 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | 2.     |        |
|00000420| 20 20 20 20 20 20 20 46 | 6f 72 77 61 72 64 20 69 |       F|orward i|
|00000430| 2a 31 30 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |*10.    |        |
|00000440| 20 20 20 20 20 20 20 20 | 4c 65 66 74 20 39 30 0d |        |Left 90.|
|00000450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000460| 20 20 20 20 46 6f 72 77 | 61 72 64 20 72 69 6e 67 |    Forw|ard ring|
|00000470| 48 65 69 67 68 74 2d 31 | 0d 20 20 20 20 20 20 20 |Height-1|.       |
|00000480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 4c 65 66 |        |     Lef|
|00000490| 74 20 39 30 0d 20 20 20 | 20 20 20 20 20 50 65 6e |t 90.   |     Pen|
|000004a0| 20 6e 61 6d 65 3d 69 2c | 20 70 69 63 74 75 72 65 | name=i,| picture|
|000004b0| 3d 22 72 69 6e 67 22 20 | 2e 20 69 20 20 20 2f 2f |="ring" |. i   //|
|000004c0| 20 70 65 6e 20 69 20 69 | 73 20 72 69 6e 67 20 69 | pen i i|s ring i|
|000004d0| 0d 20 20 20 20 20 20 20 | 20 50 65 6e 20 6e 61 6d |.       | Pen nam|
|000004e0| 65 3d 22 22 0d 20 20 20 | 20 43 6c 65 61 72 0d 20 |e="".   | Clear. |
|000004f0| 20 20 20 2f 2f 20 61 20 | 70 65 6e 20 66 6f 72 20 |   // a |pen for |
|00000500| 77 72 69 74 69 6e 67 20 | 74 68 65 20 6e 75 6d 62 |writing |the numb|
|00000510| 65 72 20 6f 66 20 72 69 | 6e 67 73 20 6d 6f 76 65 |er of ri|ngs move|
|00000520| 64 0d 20 20 20 20 6e 4d | 6f 76 65 64 20 3d 20 30 |d.    nM|oved = 0|
|00000530| 0d 20 20 20 20 50 65 6e | 20 6e 61 6d 65 3d 22 6d |.    Pen| name="m|
|00000540| 6f 76 65 64 22 2c 20 66 | 6f 6e 74 73 69 7a 65 3d |oved", f|ontsize=|
|00000550| 32 30 2c 66 6f 6e 74 73 | 74 79 6c 65 3d 22 42 6f |20,fonts|tyle="Bo|
|00000560| 6c 64 22 2c 66 6f 6e 74 | 6e 61 6d 65 3d 22 54 69 |ld",font|name="Ti|
|00000570| 6d 65 73 22 0d 20 20 20 | 20 55 70 0d 20 20 20 20 |mes".   | Up.    |
|00000580| 47 6f 74 6f 20 2d 77 69 | 64 74 68 28 29 2f 32 2b |Goto -wi|dth()/2+|
|00000590| 31 30 30 2c 20 68 65 69 | 67 68 74 28 29 2f 32 2d |100, hei|ght()/2-|
|000005a0| 34 30 2c 30 0d 20 20 20 | 20 43 6f 6c 6f 72 20 36 |40,0.   | Color 6|
|000005b0| 33 36 30 2c 36 35 35 33 | 35 2c 34 35 34 39 0d 20 |360,6553|5,4549. |
|000005c0| 20 20 20 50 72 69 6e 74 | 20 28 32 5e 4e 20 2d 20 |   Print| (2^N - |
|000005d0| 31 29 20 2e 20 22 20 72 | 69 6e 67 20 6d 6f 76 65 |1) . " r|ing move|
|000005e0| 73 20 61 72 65 20 6e 65 | 65 64 65 64 22 0d 20 20 |s are ne|eded".  |
|000005f0| 20 20 47 6f 74 6f 20 77 | 69 64 74 68 28 29 2f 32 |  Goto w|idth()/2|
|00000600| 2d 31 30 30 2c 20 68 65 | 69 67 68 74 28 29 2f 32 |-100, he|ight()/2|
|00000610| 2d 34 30 2c 30 0d 20 20 | 20 20 50 65 6e 20 6e 61 |-40,0.  |  Pen na|
|00000620| 6d 65 3d 22 22 0d 20 20 | 20 20 2f 2f 20 64 72 61 |me="".  |  // dra|
|00000630| 77 20 74 68 65 20 74 6f | 77 65 72 73 0d 20 20 20 |w the to|wers.   |
|00000640| 20 74 6f 77 65 72 42 61 | 73 65 59 20 3d 20 2d 68 | towerBa|seY = -h|
|00000650| 65 69 67 68 74 28 29 2f | 32 20 2b 20 32 30 0d 20 |eight()/|2 + 20. |
|00000660| 20 20 20 74 6f 77 65 72 | 54 6f 70 59 20 3d 20 74 |   tower|TopY = t|
|00000670| 6f 77 65 72 42 61 73 65 | 59 20 2b 20 72 69 6e 67 |owerBase|Y + ring|
|00000680| 48 65 69 67 68 74 20 2a | 20 31 31 0d 20 20 20 20 |Height *| 11.    |
|00000690| 52 65 70 65 61 74 20 69 | 2c 31 2c 33 0d 20 20 20 |Repeat i|,1,3.   |
|000006a0| 20 20 20 20 20 74 6f 77 | 65 72 58 5b 69 5d 20 3d |     tow|erX[i] =|
|000006b0| 20 28 69 2d 32 29 20 2a | 20 31 31 30 0d 20 20 20 | (i-2) *| 110.   |
|000006c0| 20 20 20 20 20 55 70 0d | 20 20 20 20 20 20 20 20 |     Up.|        |
|000006d0| 47 6f 74 6f 20 74 6f 77 | 65 72 58 5b 69 5d 2d 33 |Goto tow|erX[i]-3|
|000006e0| 2c 20 74 6f 77 65 72 42 | 61 73 65 59 2c 20 30 0d |, towerB|aseY, 0.|
|000006f0| 20 20 20 20 20 20 20 20 | 44 6f 77 6e 0d 20 20 20 |        |Down.   |
|00000700| 20 20 20 20 20 46 69 6c | 6c 20 31 2c 30 2c 30 2c |     Fil|l 1,0,0,|
|00000710| 30 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 52 65 |0.      |      Re|
|00000720| 70 65 61 74 20 32 0d 20 | 20 20 20 20 20 20 20 20 |peat 2. |        |
|00000730| 20 20 20 20 20 20 20 46 | 6f 72 77 61 72 64 20 36 |       F|orward 6|
|00000740| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000750| 20 4c 65 66 74 20 39 30 | 0d 20 20 20 20 20 20 20 | Left 90|.       |
|00000760| 20 20 20 20 20 20 20 20 | 20 46 6f 72 77 61 72 64 |        | Forward|
|00000770| 20 74 6f 77 65 72 54 6f | 70 59 2d 74 6f 77 65 72 | towerTo|pY-tower|
|00000780| 42 61 73 65 59 0d 20 20 | 20 20 20 20 20 20 20 20 |BaseY.  |        |
|00000790| 20 20 20 20 20 20 4c 65 | 66 74 20 39 30 0d 20 20 |      Le|ft 90.  |
|000007a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 0d 20 |        |      . |
|000007b0| 20 20 20 2f 2f 20 64 72 | 6f 70 20 74 68 65 20 4e |   // dr|op the N|
|000007c0| 20 72 69 6e 67 20 6f 6e | 20 74 6f 77 65 72 20 23 | ring on| tower #|
|000007d0| 31 0d 20 20 20 20 6e 54 | 6f 77 65 72 5b 31 5d 20 |1.    nT|ower[1] |
|000007e0| 3d 20 4e 0d 20 20 20 20 | 6e 54 6f 77 65 72 5b 32 |= N.    |nTower[2|
|000007f0| 5d 20 3d 20 30 0d 20 20 | 20 20 6e 54 6f 77 65 72 |] = 0.  |  nTower|
|00000800| 5b 33 5d 20 3d 20 30 0d | 20 20 20 20 52 65 70 65 |[3] = 0.|    Repe|
|00000810| 61 74 20 69 2c 4e 2c 31 | 2c 2d 31 0d 20 20 20 20 |at i,N,1|,-1.    |
|00000820| 20 20 20 20 50 65 6e 20 | 6e 61 6d 65 3d 69 2c 20 |    Pen |name=i, |
|00000830| 73 70 65 65 64 3d 31 30 | 30 30 2c 65 6e 64 3d 22 |speed=10|00,end="|
|00000840| 79 65 73 22 0d 20 20 20 | 20 20 20 20 20 55 70 0d |yes".   |     Up.|
|00000850| 20 20 20 20 20 20 20 20 | 47 6f 74 6f 20 74 6f 77 |        |Goto tow|
|00000860| 65 72 58 5b 31 5d 2c 20 | 68 65 69 67 68 74 28 29 |erX[1], |height()|
|00000870| 2c 30 0d 20 20 20 20 20 | 20 20 20 44 6f 77 6e 0d |,0.     |   Down.|
|00000880| 20 20 20 20 20 20 20 20 | 53 6f 75 6e 64 20 22 57 |        |Sound "W|
|00000890| 68 69 70 22 2c 77 61 69 | 74 0d 20 20 20 20 20 20 |hip",wai|t.      |
|000008a0| 20 20 47 6f 74 6f 20 78 | 28 29 2c 20 74 6f 77 65 |  Goto x|(), towe|
|000008b0| 72 42 61 73 65 59 20 2b | 20 28 4e 2d 69 29 2a 72 |rBaseY +| (N-i)*r|
|000008c0| 69 6e 67 48 65 69 67 68 | 74 2c 2d 39 30 0d 20 20 |ingHeigh|t,-90.  |
|000008d0| 20 20 20 20 20 20 64 6f | 6e 67 28 37 29 0d 20 20 |      do|ng(7).  |
|000008e0| 20 20 0d 20 20 20 20 0d | 2f 2f 20 4d 6f 76 65 4f |  .    .|// MoveO|
|000008f0| 6e 65 20 2d 20 6d 6f 76 | 65 20 6f 6e 65 20 72 69 |ne - mov|e one ri|
|00000900| 6e 67 20 66 72 6f 6d 20 | 6f 6e 65 20 70 6f 6c 65 |ng from |one pole|
|00000910| 20 74 6f 20 61 6e 6f 74 | 68 65 72 0d 2f 2f 2f 2f | to anot|her.////|
|00000920| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00000930| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00000940| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 0d |////////|///////.|
|00000950| 46 75 6e 63 74 69 6f 6e | 20 4d 6f 76 65 4f 6e 65 |Function| MoveOne|
|00000960| 28 72 69 6e 67 2c 66 72 | 6f 6d 2c 74 6f 29 0d 20 |(ring,fr|om,to). |
|00000970| 20 20 20 49 66 20 64 6f | 50 61 75 73 65 0d 20 20 |   If do|Pause.  |
|00000980| 20 20 20 20 20 20 61 73 | 6b 28 31 29 0d 20 20 20 |      as|k(1).   |
|00000990| 20 50 65 6e 20 6e 61 6d | 65 3d 72 69 6e 67 2c 20 | Pen nam|e=ring, |
|000009a0| 73 70 65 65 64 3d 73 70 | 65 65 64 31 0d 20 20 20 |speed=sp|eed1.   |
|000009b0| 20 44 6f 77 6e 0d 20 20 | 20 20 47 6f 74 6f 20 74 | Down.  |  Goto t|
|000009c0| 6f 77 65 72 58 5b 66 72 | 6f 6d 5d 2c 20 74 6f 77 |owerX[fr|om], tow|
|000009d0| 65 72 54 6f 70 59 2b 35 | 30 2c 20 30 0d 20 20 20 |erTopY+5|0, 0.   |
|000009e0| 20 47 6f 74 6f 20 74 6f | 77 65 72 58 5b 74 6f 5d | Goto to|werX[to]|
|000009f0| 2c 20 79 28 29 2c 20 30 | 0d 20 20 20 20 50 61 75 |, y(), 0|.    Pau|
|00000a00| 73 65 20 74 68 65 50 61 | 75 73 65 0d 20 20 20 20 |se thePa|use.    |
|00000a10| 50 65 6e 20 73 70 65 65 | 64 3d 73 70 65 65 64 32 |Pen spee|d=speed2|
|00000a20| 0d 20 20 20 20 47 6f 74 | 6f 20 78 28 29 2c 20 74 |.    Got|o x(), t|
|00000a30| 6f 77 65 72 42 61 73 65 | 59 20 2b 20 6e 54 6f 77 |owerBase|Y + nTow|
|00000a40| 65 72 5b 74 6f 5d 2a 72 | 69 6e 67 48 65 69 67 68 |er[to]*r|ingHeigh|
|00000a50| 74 2c 2d 39 30 0d 20 20 | 20 20 64 6f 6e 67 28 35 |t,-90.  |  dong(5|
|00000a60| 29 0d 20 20 20 20 6e 54 | 6f 77 65 72 5b 66 72 6f |).    nT|ower[fro|
|00000a70| 6d 5d 20 3d 20 6e 54 6f | 77 65 72 5b 66 72 6f 6d |m] = nTo|wer[from|
|00000a80| 5d 20 2d 20 31 0d 20 20 | 20 20 6e 54 6f 77 65 72 |] - 1.  |  nTower|
|00000a90| 5b 74 6f 5d 20 3d 20 6e | 54 6f 77 65 72 5b 74 6f |[to] = n|Tower[to|
|00000aa0| 5d 20 2b 20 31 0d 20 20 | 20 20 50 65 6e 20 6e 61 |] + 1.  |  Pen na|
|00000ab0| 6d 65 3d 22 6d 6f 76 65 | 64 22 0d 20 20 20 20 44 |me="move|d".    D|
|00000ac0| 6f 77 6e 0d 20 20 20 20 | 43 6f 6c 6f 72 20 36 35 |own.    |Color 65|
|00000ad0| 35 33 35 2c 36 35 35 33 | 35 2c 36 35 35 33 35 0d |535,6553|5,65535.|
|00000ae0| 20 20 20 20 46 69 6c 6c | 20 31 2c 36 35 35 33 35 |    Fill| 1,65535|
|00000af0| 2c 36 35 35 33 35 2c 36 | 35 35 33 35 0d 20 20 20 |,65535,6|5535.   |
|00000b00| 20 20 20 20 20 52 65 70 | 65 61 74 20 32 0d 20 20 |     Rep|eat 2.  |
|00000b10| 20 20 20 20 20 20 20 20 | 20 20 46 6f 72 77 61 72 |        |  Forwar|
|00000b20| 64 20 39 39 0d 20 20 20 | 20 20 20 20 20 20 20 20 |d 99.   |        |
|00000b30| 20 4c 65 66 74 20 39 30 | 0d 20 20 20 20 20 20 20 | Left 90|.       |
|00000b40| 20 20 20 20 20 46 6f 72 | 77 61 72 64 20 33 39 0d |     For|ward 39.|
|00000b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 4c 65 66 74 |        |    Left|
|00000b60| 20 39 30 0d 20 20 20 20 | 43 6f 6c 6f 72 20 36 35 | 90.    |Color 65|
|00000b70| 35 33 35 2c 37 31 30 36 | 2c 32 39 36 31 36 0d 20 |535,7106|,29616. |
|00000b80| 20 20 20 6e 4d 6f 76 65 | 64 20 3d 20 6e 4d 6f 76 |   nMove|d = nMov|
|00000b90| 65 64 2b 31 0d 20 20 20 | 20 50 72 69 6e 74 20 6e |ed+1.   | Print n|
|00000ba0| 4d 6f 76 65 64 0d 0d 2f | 2f 20 64 6f 6e 67 20 2d |Moved../|/ dong -|
|00000bb0| 20 62 6f 75 6e 63 65 20 | 74 68 65 20 64 69 73 6b | bounce |the disk|
|00000bc0| 20 61 6e 64 20 70 6c 61 | 79 20 74 68 65 20 6d 65 | and pla|y the me|
|00000bd0| 74 61 6c 20 73 6f 75 6e | 64 0d 2f 2f 2f 2f 2f 2f |tal soun|d.//////|
|00000be0| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00000bf0| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00000c00| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 0d 46 75 6e |////////|////.Fun|
|00000c10| 63 74 69 6f 6e 20 64 6f | 6e 67 28 6e 2c 61 29 0d |ction do|ng(n,a).|
|00000c20| 20 20 20 20 53 6f 75 6e | 64 20 22 50 6f 6c 65 22 |    Soun|d "Pole"|
|00000c30| 2c 20 6e 6f 77 61 69 74 | 20 20 2f 2f 20 70 6c 61 |, nowait|  // pla|
|00000c40| 79 20 69 6e 20 74 68 65 | 20 62 61 63 6b 67 72 6f |y in the| backgro|
|00000c50| 75 6e 64 0d 20 20 20 20 | 50 65 6e 20 73 70 65 65 |und.    |Pen spee|
|00000c60| 64 3d 32 30 30 20 20 20 | 20 20 20 20 20 20 2f 2f |d=200   |      //|
|00000c70| 20 73 6f 6d 65 20 76 69 | 62 65 73 0d 20 20 20 20 | some vi|bes.    |
|00000c80| 52 65 70 65 61 74 20 61 | 2c 6e 2c 31 2c 2d 31 0d |Repeat a|,n,1,-1.|
|00000c90| 20 20 20 20 20 20 20 20 | 42 61 63 6b 77 61 72 64 |        |Backward|
|00000ca0| 20 61 0d 20 20 20 20 20 | 20 20 20 46 6f 72 77 61 | a.     |   Forwa|
|00000cb0| 72 64 20 61 0d 20 20 20 | 20 73 6f 75 6e 64 20 22 |rd a.   | sound "|
|00000cc0| 22 2c 20 77 61 69 74 20 | 20 20 20 20 20 20 20 2f |", wait |       /|
|00000cd0| 2f 20 72 65 2d 73 79 6e | 63 20 74 68 65 20 73 6f |/ re-syn|c the so|
|00000ce0| 75 6e 64 0d 00 00 00 00 | 00 00 00 00 00 00 00 00 |und.....|........|
|00000cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d00| 00 00 01 00 00 00 01 1d | 00 00 00 1d 00 00 00 56 |........|.......V|
|00000d10| 72 8a 09 12 5e 0e 90 86 | 12 56 6d 30 7f 16 56 77 |r...^...|.Vm0..Vw|
|00000d20| 0f 7f c8 06 16 56 77 0b | 7f bf 15 13 86 60 9b 15 |.....Vw.|.....`..|
|00000d30| 13 54 6f 77 65 72 73 20 | 6f 66 20 48 61 6e 6f 69 |.Towers |of Hanoi|
|00000d40| 2e 6c 69 62 02 00 00 00 | 55 56 74 78 55 56 74 6c |.lib....|UVtxUVtl|
|00000d50| 00 00 55 56 74 78 55 56 | 74 6c 00 00 40 e0 41 20 |..UVtxUV|tl..@.A |
|00000d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d70| 00 00 a7 16 07 f1 00 00 | 0c 64 00 00 01 73 51 6c |........|.d...sQl|
|00000d80| 18 7c 7f d4 b9 0a 7e 0a | 90 13 60 60 51 6c 18 7d |.|....~.|..``Ql.}|
|00000d90| 7e 75 ca 7e 71 b9 72 13 | 57 32 5f ff fe 13 ea 5e |~u.~q.r.|W2_....^|
|00000da0| 0e e6 0c 15 13 86 67 13 | 73 85 67 13 74 85 12 14 |......g.|s.g.t...|
|00000db0| 80 70 cc b1 01 56 7e a0 | 13 5c 67 b8 04 60 13 72 |.p...V~.|.\g..`.r|
|00000dc0| 85 4c b9 45 14 8c 78 23 | 16 e6 85 2c 13 58 c8 39 |.L.E..x#|...,.X.9|
|00000dd0| 13 5a c8 35 13 59 c8 31 | 13 55 09 69 b8 0a 13 55 |.Z.5.Y.1|.U.i...U|
|00000de0| 09 bc 13 55 09 62 c2 21 | 5f 47 5c a4 35 b9 1a 0f |...U.b.!|_G\.5...|
|00000df0| 57 77 06 c8 09 13 57 b9 | 10 13 55 08 c8 0b 01 16 |Ww....W.|..U.....|
|00000e00| 00 00 00 08 00 3d 00 06 | 01 bf 01 ff 00 00 00 08 |.....=..|........|
|00000e10| 00 2c 00 b2 01 d0 02 79 | 00 00 00 01 00 00 00 01 |.,.....y|........|
|00000e20| 00 00 00 01 1d 00 00 00 | 1d 00 00 00 56 00 3c 6f |........|....V.<o|
|00000e30| 54 12 5e 00 00 00 1c 00 | 52 00 01 77 53 69 5a 00 |T.^.....|R..wSiZ.|
|00000e40| 01 00 12 77 32 72 6e 00 | 00 00 2a 01 2c 00 00 00 |...w2rn.|..*.,...|
|00000e50| 00 00 00 02 b9 1d c8 01 | 90 00 02 00 00 00 0c 02 |........|........|
|00000e60| b9 93 b8 00 5a ff ff 00 | 00 00 18 00 00 00 00 01 |....Z...|........|
|00000e70| 45 01 52 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |E.R.....|........|
+--------+-------------------------+-------------------------+--------+--------+